home *** CD-ROM | disk | FTP | other *** search
/ Compendium Deluxe 2 / LSD and 17bit Compendium Deluxe - Volume II.iso / a / prog / cprog / ddjcomp.lha / ashford / compress.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-08-04  |  2.7 KB  |  155 lines
  1. /*
  2.     Test statistical compression using fixed dictionary
  3. */
  4.  
  5.  
  6. #include <stdio.h>
  7. #include <stdlib.h>
  8. #include <ctype.h>
  9. #include <time.h>
  10.  
  11. #include "comp.h"
  12. #include "files.h"
  13.  
  14. #define COMP_STAT
  15.  
  16. static char *input_file_name;
  17. static char *output_file_name = "compfile";
  18. static unsigned long expand_size = 0;
  19.  
  20.  
  21. static void compress_file (int);
  22. static void print_time (clock_t);
  23. static void print_compression (FILE *);
  24.  
  25.  
  26. int main (int argc, char *argv [])
  27.  
  28. {
  29.     clock_t start_time;
  30.  
  31.     int max_order;
  32.     char *p;
  33.  
  34.     if (argc < 3 || argc > 4)
  35.     {
  36.         fprintf (stderr, "Usage: cmp <order> <input file1> [<optional output file2>]\n");
  37.         fprintf (stderr, "Output file name defaults to 'compfile'\n");
  38.         return EXIT_FAILURE;
  39.     }
  40.  
  41.     max_order = 0;
  42.     p = argv [1];
  43.     while (*p)
  44.     {
  45.         if (!isdigit (*p))
  46.         {
  47.             fprintf (stderr, "Invalid order\n");
  48.             exit (EXIT_FAILURE);
  49.         }
  50.  
  51.         max_order *= 10;
  52.         max_order += *p - '0';
  53.  
  54.         p ++;
  55.     }
  56.  
  57.     if (max_order > MAX_ORDER) max_order = MAX_ORDER;
  58.  
  59.     input_file_name = argv [2];
  60.     if (argc == 4) output_file_name = argv [3];
  61.  
  62.     OpenInputFile (input_file_name);
  63.     OpenOutputFile (output_file_name);
  64.  
  65.     fprintf (stdout, "Input file: %s\n", input_file_name);
  66.     fprintf (stdout, "Order: %d\n", max_order);
  67.     fprintf (stdout, "Dictionary size: %u\n", NDICT);
  68.  
  69.     start_time = clock ();
  70.     compress_file (max_order);
  71.  
  72.     print_time (clock () - start_time);
  73.     CloseInputFile ();
  74.  
  75.     return EXIT_SUCCESS;
  76. }
  77.  
  78.  
  79.  
  80. static void compress_file (int max_order)
  81.  
  82. {
  83.     int ch;
  84.  
  85.     InitModel (max_order);
  86.  
  87.     expand_size = 0;
  88.  
  89.     ch = ReadInputFile ();
  90.     while (ch != EOF)
  91.     {
  92.         CompressSymbol (ch);
  93.         expand_size ++;
  94.  
  95. #ifdef COMP_STAT
  96.         if ((expand_size & 0xFF) == 0) print_compression (stderr);
  97. #endif
  98.  
  99.         ch = ReadInputFile ();
  100.     }
  101.  
  102.     CompressSymbol (END_OF_FILE);
  103.  
  104.     CloseModel ();
  105.  
  106. #ifdef COMP_STAT
  107.     print_compression (stderr);
  108. #endif
  109.  
  110.     print_compression (stdout);
  111.     fprintf (stdout, "\n");
  112. }
  113.  
  114.  
  115. static void print_compression (FILE *fptr)
  116.  
  117. {
  118.     unsigned long comp_size;
  119.     unsigned long t, t2;
  120.     unsigned x, y;
  121.  
  122.     comp_size = GetOutputLength ();
  123.     t = 1000 * comp_size;
  124.     t2 = expand_size >> 1;
  125.     x = (unsigned) ((t + t2) / expand_size);
  126.     y = (unsigned) ((8 * t + t2) / expand_size);
  127.  
  128.     fprintf (fptr, "%ld/%ld    %u.%01u    (%u.%03u) \r", expand_size, comp_size,
  129.         x / 10, x % 10, y / 1000, y % 1000);
  130. }
  131.  
  132.  
  133.  
  134. static void print_time (clock_t t)
  135.  
  136. {
  137.     long t2;
  138.     unsigned t3;
  139.     unsigned hh, mm, ss;
  140.  
  141.     t2 = t * 10 / CLK_TCK;
  142.     hh = (unsigned) (t2 / 36000L);
  143.     t3 = (unsigned) (t2 % 36000L);
  144.     mm = t3 / 600;
  145.     t3 %= 600;
  146.     ss = t3 / 10;
  147.     t3 %= 10;
  148.  
  149.     fprintf (stdout, "Time: ");
  150.     if (hh)
  151.         fprintf (stdout, "%d:%02d:%02d.%01d\n", hh, mm, ss, t3);
  152.     else
  153.         fprintf (stdout, "%d:%02d.%01d\n", mm, ss, t3);
  154. }
  155.